From 686fc9abcba115c5c8027a1b884fe6f5c0b9bb10 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 28 May 1993 20:33:14 +0000 Subject: [PATCH] (hexl-char-after-point): Get rid of mistakenly free variables. --- lisp/hexl.el | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/lisp/hexl.el b/lisp/hexl.el index d561f4a7829..e8e5e430937 100644 --- a/lisp/hexl.el +++ b/lisp/hexl.el @@ -500,9 +500,8 @@ You may also type up to 3 octal digits, to insert a character with that code" (defun hexl-char-after-point () "Return char for ASCII hex digits at point." - (setq lh (char-after (point))) - (setq rh (char-after (1+ (point)))) - (hexl-htoi lh rh)) + (hexl-htoi (char-after (point)) + (char-after (1+ (point))))) (defun hexl-htoi (lh rh) "Hex (char) LH (char) RH to integer." -- 2.30.2